python
#### license: creative commons cc0 1.0 (public domain)
#### http://creativecommons.org/publicdomain/zero/1.0/
fig

function orna a b 
p 0 minus 3.14159
var linewidth 1
while
now = p
p = now plus 0.1
x = p cos times 8 plus a int
y = p sin times 8 plus b int
var line a b x y 14
a2 a
b2 b plus 30
x = p cos times 6 plus a2 int
y = p sin times 6 plus b2 int
var line a2 b2 x y 15
a3 a2-20
b3 b2 plus 30
x = p cos times 6 plus a3 int
y = p sin times 6 plus b3 int
var line a3 b3 x y 14
a4 a2 plus 20
b4 b3 plus 10
x = p cos times 6 plus a4 int
y = p sin times 6 plus b4 int
var line a4 b4 x y 14
a5 a2
b5 b2 plus 70
x = p cos times 6 plus a5 int
y = p sin times 6 plus b5 int
var line a5 b5 x y 15

ifmore p 3.14159
break
fig

wend
fig

function tree x y
p 0.9

x1stem = x 
y1stem = y plus 100
x2stem = x
y2stem = y1stem plus 50

var linewidth 20
var line x1stem y1stem x2stem y2stem 4

while
now = p
p = now plus 0.05
x2 = p cos times 121 plus x
y2 = p sin times 121 plus y
var linewidth 7
var line x y x2 y2 2


ifmore p 2
break
fig

wend


fig

for i 20 1000 120
for j 20 1000 170
var tree i j orna i j
fig
fig


python
########################################################
fig

function sn i j c
p 0 minus 3.14159
var linewidth 3
while
now = p
p = now plus 0.9
x = p cos times 10 plus i int
y = p sin times 10 plus j int
v = p cos times 5 plus i int
q = p sin times 5 plus j int
var line x y v q c

ifmore p 3.14159
break
fig

wend

fig

turn 0
for i 10 1000 100
for j 10 1000 100
turn plus 1
rem turn mod 2
ifequal rem 0
var sn i j 9
fig
else
var sn i j 15
fig
fig
fig


now "" lineinput
